home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Leser 19 / Amiga Plus Leser CD 19.iso / Sound / DelfMPEG / rexx / vol < prev   
Encoding:
Text File  |  2002-11-17  |  328 b   |  20 lines
  1. /** DelfMPEG ARexx test **/
  2.  
  3. /* usage: rx vol <volume> */
  4.  
  5. PARSE ARG volume
  6. ADDRESS DELFMPEG
  7. OPTIONS RESULTS
  8.  
  9. if volume=='' then do
  10.     say 'missing parameter <volume>'
  11.     return 20
  12. end
  13.  
  14. if ((volume<0) | (volume>200)) then do
  15.     say 'invalid value for parameter <volume> (must be 0...200)'
  16.     return 20
  17. end
  18.  
  19. SETVOLUME volume
  20.